home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 01p.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-09  |  1.9 KB  |  68 lines
  1. on startMovie
  2.   global gKnobSprite, gSendMovie, gCursorReady, gMagCursor
  3.   gMagCursor = "magCursor"
  4.   gCursorReady = 1
  5.   gKnobSprite = 14
  6.   gSendMovie = "01p"
  7.   setUpKnob()
  8.   puppetSprite(48, 1)
  9.   set the mouseDownScript to EMPTY
  10.   set the mouseUpScript to EMPTY
  11.   sprite(34).visible = 0
  12. end
  13.  
  14. on stopMovie
  15.   when timeOut then nothing
  16. end
  17.  
  18. on idle
  19.   global gCursorReady
  20.   if gCursorReady = 1 then
  21.     cursor(200)
  22.     checkCursors()
  23.     set the locH of sprite 48 to the mouseH
  24.     set the locV of sprite 48 to the mouseV
  25.     updateStage()
  26.   end if
  27. end
  28.  
  29. on checkCursors
  30.   global gMagCursor
  31.   set the castNum of sprite 48 to the number of member "curs1"
  32.   if the castNum of sprite 5 and rollOver(5) then
  33.     set the castNum of sprite 48 to the number of member gMagCursor
  34.   end if
  35.   if the castNum of sprite 6 and rollOver(6) then
  36.     set the castNum of sprite 48 to the number of member gMagCursor
  37.   end if
  38.   if the castNum of sprite 8 and rollOver(8) then
  39.     set the castNum of sprite 48 to the number of member "deMagCursor"
  40.   end if
  41.   repeat with i = 15 to 17
  42.     if rollOver(i) then
  43.       set the castNum of sprite 48 to the number of member "hotCursor"
  44.     end if
  45.   end repeat
  46.   repeat with i = 19 to 24
  47.     if the castNum of sprite i and rollOver(i) then
  48.       set the castNum of sprite 48 to the number of member "hotCursor"
  49.     end if
  50.   end repeat
  51.   repeat with i = 30 to 31
  52.     if rollOver(i) then
  53.       set the castNum of sprite 48 to the number of member "hotCursor"
  54.     end if
  55.   end repeat
  56.   if rollOver(34) and (sprite(34).visible = 1) then
  57.     set the castNum of sprite 48 to the number of member "hotCursor"
  58.   end if
  59.   repeat with i = 40 to 42
  60.     if rollOver(i) then
  61.       set the castNum of sprite 48 to the number of member "hotCursor"
  62.     end if
  63.   end repeat
  64.   if the castNum of sprite 47 and rollOver(47) then
  65.     set the castNum of sprite 48 to the number of member "hotCursor"
  66.   end if
  67. end
  68.